﻿Imports ModuloEstoque
Public Class EstoqueUC
    Private Sub TSBCategoria_Click(sender As System.Object, e As System.EventArgs) Handles TSBCategoria.Click
        frmPrincipal.TPEstoque.Controls.Clear()
        Dim uc = New CategoriaUC
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPEstoque.Controls.Add(uc)
    End Sub

    Private Sub TSBClassFiscal_Click(sender As System.Object, e As System.EventArgs) Handles TSBClassFiscal.Click
        frmPrincipal.TPEstoque.Controls.Clear()
        Dim uc = New ClassificacaoFiscalUC
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPEstoque.Controls.Add(uc)
    End Sub

    Private Sub TSBFabricante_Click(sender As System.Object, e As System.EventArgs) Handles TSBFabricante.Click
        frmPrincipal.TPEstoque.Controls.Clear()
        Dim uc = New FabricanteUC
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPEstoque.Controls.Add(uc)
    End Sub

    Private Sub TSBPeca_Click(sender As System.Object, e As System.EventArgs) Handles TSBPeca.Click
        frmPrincipal.TPEstoque.Controls.Clear()
        Dim uc = New PecaUC
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPEstoque.Controls.Add(uc)
    End Sub

    Private Sub TSBServico_Click(sender As System.Object, e As System.EventArgs) Handles TSBServico.Click
        frmPrincipal.TPEstoque.Controls.Clear()
        Dim uc = New ServicoUC
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPEstoque.Controls.Add(uc)
    End Sub

    Private Sub TSBEntradaManual_Click(sender As System.Object, e As System.EventArgs) Handles TSBEntradaManual.Click
        Dim frm = New EntradaManualCAD
        frm.ShowDialog()
    End Sub

    Private Sub TSBInventario_Click(sender As System.Object, e As System.EventArgs) Handles TSBInventario.Click
        frmPrincipal.TPEstoque.Controls.Clear()
        Dim uc = New IventarioUC
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPEstoque.Controls.Add(uc)

    End Sub

End Class
